DDDDDDDDDDDD EEEEEEEEEEEEEEE BBB8BBBB8BB8B UUU UUU GGGGGGGGGGGG 
DODDDDDDDDDD EEEEEEEEEEEEEEE BBB888BB8BBBB UUU UUU GGGGGGGGGGGG 
DDDDDDDDDDDD EEEEEEEEEEEEEEE B8BB8BB8BBEB UUU UUU GGGGGGGGGGGG 
DOD | DDD EEE BBB BBB UUU UU G 

DOD DDD EEE BBB BBB UUU UUU GGG 

DDD DDD EEE 888 BBB UUU UUU GGG 

DOD DOD EEE BBB BBB UUU UUU GGG 

DDD DOD EEE 888 BBB UUU UUU GGG 

DOD DDD EEE BBB BBB UUU UUU GGG 

DOD DDD EEEEEEEEEEEE BBBBBBBBBBBB UUU UUU GGG 

DDD DDD EEEEEEEEEEEE BBBBBBBS8EEBB UUU UUU GGG 

DOD DDD EEEEEEEEEEEE BBBBBBBSBBBB UUU UUU GGG 

DOD DDD EEE BBB UUU UUU GGG GG6GGGGGGG 
DDD DDD EEE B88 BBB UUU UUU GGG 6G6G6G6GGGG6G 
DOD DDD EEE BBB BBB UUU UUU GGG 666666666 
DDD DDD EEE 888 BBB UUU UUU GGG GGG 
DOD DDD EEE BBB BBB UUU UUU GGG GGG 
DOD DDD EEE BBB BBB UUU UUU GGG GGG 
DDDDDDDDDDDD EEEEEEEEEEEEEEE B88B8BB8B888 UUUUUUUUUUUUUUU GGGGGGGGG 
DDDDDODDDDDD EEEEEEEEEEEEEEE BBSBBBB8BBBB UUUUUUUUUUUUUUU GGGGGGGGG 
DDDDDDDDDDDD EEEEEEEEEEEEEEE BB8B8BBBBBBBB UUUUUUUUUUUUUUU GGGGGGGGG 


**F ILE**1De*DBGSTO 
DDDDDDDD BBBBBBBB GGGGGGGG SSSSSSSS TTTTTTTITT 000000 
DDDDDDDD BBBBBBEB GGGGGGGG SSSSSSSS TITTTITTTT 000000 
DD DD 68 BB GG SS TT 00 00 
dD DD 8B BB GG $$ TT 00 00 
DD DD BB BB GG SS TT 00 00 
DD DD 8B BB GG SS TT 00 00 
dD DD BBBBBBBB GG SSSSSS TT 00 00 
oD DD GG SSSSSS TT 00 00 
DD DD 88 BB GG GGGGGG SS TT 00 00 
DD DD BB BB GG 666666 SS TT 00 00 
dD DD 8B BB GG GG $$ TT 00 00 eee 
DD DD 8B BB $$ TT 00 00 eee 
DDODDDDD BBBBE8BB GGGGGG SSSSSSSS TT 000000 eee 
DDODDDDD BBBBBBBB GGGGGG SSSSSSSS TT 000000 cove 
LL Lith] SSSSSSSS 
LL 11111] SSSSSSSS 
LL I] $$ 
LL 11 SS 
Li I] SS 
LL 1] SS 
LL I] SSSSSS 
LL I] $SSS5SS 
de . i] $$ 
LL I] SS 
‘UL I] $$ 
LL I] SS 
LLELLLELLL T1111 SSSSSSSS 
LLELLELLELL H1IU1 SSSSSSSS 
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vo 000 14 Sep 95:79:16 DISKSVMSMASTER : DEBUG. SRC IDBGSTO.B32:1> (1) 


001 © MODULE DBGSTO ( IDENT = 'v04-000') = 
90¢ BEGIN 
Bone SPOOR RARER EEE RAH HERRAAAAAEAEEHE HET H TEAR RRARAARREERHeAeeeKEReeteees 
'@ 
O96 ie COPYRIGHT (c) 1978, 1980, 1982, 1984 BY 
0 ie DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
008 is ALL RIGHTS RESERVED. 
0010 1 '* THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED 
0011 i@ ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE 


:* INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER 
'e et THEREOF MAY NOT BE PROVIDED. OR OTHERWISE MADE AVAILABLE TO ANY 


® 
® 
€ 
® 
® 
® 
a 
® 
® 
' * 
ie TRANSFERRED. . 
' * 
ie THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * 
ie AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * 
ie CORPORATION. . 

® 

® 

® 

® 

& 

® 


!* DIGITAL ASSUMES NO RESPONSIB 


IBILIT 
:* SOFTWARE ON EQUIPMENT WHICH IS N 


Y FOR THE USE OR RELIABILITY OF ITS 
NOT SUPPLIED BY DIGITAL. 


aR RA REE RAHA HAAHAARAAEAAAEAERAEHHATEAE HERE HRAAKe Ree AKeAeeReeeneeeeee 
1 


i FACILITY: DEBUG 


+ 
FUNCTIONAL DESCRIPTION: 
DECLARES GLOBAL VARIABLES FOR DEBUG FACILITY 


Version: 1.12 


Sretere: 
uthor: 


MEWN —O OOBNO UES WDNR HOO BNOAUE WN“ ODOONOUSWwN— 


AWA AI AIA PO PROPOR NUPURNY — es 


3 


Carol Peters, 03 Jul 1976: Version 01 


ODWNOAMVEWN (OOD NOA UNE WN OC OONOUE wr 


SSSSSSSSssssooeooooooeoeSess 
WAAAA AMAIA RIPPIN NPINININYSYD 4 4 OOO 


ek a te tt kt a at at os a 4 bs = ss ds bs = on > as bs os ss ss ss 3 9 4D 


] 
i¢ 
' 
i 
i 
i 
i 
i 
i 
i 
9 : Modified by: 
40 0040 : Broce Olsen, 11 ost! 1979 
41 0041 : Ken Nappa, 28 APR 1980 
42 004 Richard Title. a AUG 1981 
44 Bpee : Rey isign aceterys 
45 45 ! 3.00 21-AUG- RT Added some globals that are used during the 
46 9k : source Line display. 
47 004 : $°8) 5-se0n8! RT Added & to dbgstoken.t 
48 oes ! 3.02 20-0ct- RT Added dbg$gb_search h ptr e* dbgsgb_ def_search 
49 004 : to implement the SEARCH comman 
50 3030 ! 3.03 12-Nov-81 RT aeted dbgsal nest _ k and dbgsal nest_level 
51 0051 ‘ fix a bug in h hindl ng nested subscript expressions 
28 R036 4 in FORTRAR and BASIC 
5 005 ! 3.04 20-Nov-81 RT Aged dbg$gb_set _module flag. This is ,waed to 
54 pore ‘ w for module names Ehat begin with umber 
25 055 ' 3.05 21-Dec-81 RT haded DBGSGB. Exc BRE f FLAG and DBG$GB_GO “ARG FLAG 
56 2026 : to handle CORt ining from an gacgption & rea 
57 005 ! 3.06 21-Dec-81 RT Deleted changes ? through from this List 


[—-— 


$-32 V4.0-74 


1 
DBGSTO 1b-se “1984 02:39:14 ° -0=742 Pa 2 
v04-000 12360-1984 9333 £36 TER: CDEBUG.SRCIDBGSTO.B32;1"— (1) 


3 8 00 1! 
; "s $089 1! $-82 3-May- JF Added DBG$GB_IMPLEMENTATION 
; #8 060 1! 3.08 06-May- RT Added data structure sor SET DEFINE 
3.6 ST 0061 1! 4.0 1-Aug- PS Added read error I variable 
ce R298 1! 4,01 $50 ute Added DBCSGL "CURRENT. P 
; °; one? : 4.02 15-0ct- wC Added DBGSGL_MOVED_DST_LIST_HEAD 
; 65 0065 ee 
; $3 Bee : INCLUDE FILES 
> 68 0068 1. 
; 69 8 69 1 REQUIRE PEER BBGrDOL OS REQ'; 
3 70 0 3 LIBRARY 'LIB$:DBGGEN.L32'; 
1s 0205 1 re 
3 7 0 06 1 VaR RRR AR AREA RAAAAHEEREREEHETHEH HE TEEE ATER AAAAAAHeRAHAeeHeHeeeneeee 
it oR $508 1 pete: 
> 7 0209 1 i ALL intetoltzet ton of addresses ond (peat in the debugger 
les 77 0210 1 i MUST be done dynamica 
: 78 0211 1 i to maintain Ba... th independence. At J enpite time these addresses 
; 79 ost¢ 1 i are relative to 0, but are relocated ot run time since the debugger 
; ww os 1 i is brought in '" hind” the user program 
; 81 0214 #1 ‘eaeeeerneterenene . eeeeereererertererereteererearereerereneereerereeee 
> & 0215 1 jee 
5; .§ 0216 1 
ls 84 0217 1 !GLOBAL LITERAL 
; 85 0218 1 ! The base of RST ere e. Some of the RST data structures base 
r a6 5344 : ‘pointers’ off this. This is now a Link time input 
> 88 0551 es DBGS_RST_BEGIN = ZX'7FFFOOO0'; for standard and test debugger 
: 4 bse¢ ; : DBGS_RST"“BEGIN = ‘‘somewhere in PO for SUPERDEBUG 
> 91 0224 1 
: O55¢ ’ EXTERNAL LITERAL DBGSGL_SUP_OR_TEST : WEAK; 
94 0599 1 GLOBAL DBGSGV_CONTROL : VECTORC2,BYTE) INITIAL( 
lis Bss8 1 WORD ( 
> 9 0 “3 1 (DBGSGL_SUP_OR_TEST) OR 
5 24 ps3 : (1*8))); 
: 99 0980 1 !e 
; 100 0233 1! THE eoescher. teste associates each ASCII character with a value 
: 101 8 3 1! from 0 to 2 sean ten of the numeric value can be seen in 
is 196 5 1! Literal am i. declared in SCALIT.BEG (for example, 1 is bound 
: 137 3 § 1; i to alpha). 
> 105 6 8 1 GLOBAL BIND 
: 198 8520 ! dbg$char_table = UPLIT BYTE ¢ 
(> 108 0241 1 6. Ss & 6. &-s. 2 1800-007 treat null char as If 
'3; 109 4 1 >. a. ae Oe a Oe . » !010-017 tab, Lf, vtab, ff. cr 
: 110 45 1 8 2 8. oh oe e Be Be 3 § - ¢ 
; 111 4G 1 o . e 0, e 7 e } = 7 Pr 
Fie ee ae a a 
: $94 0509 4 2: 3: ae ee 5. 2; 2: 1060-067 012346567 


co 
“” 
o- 


< 


ey see tet oe the ah ae Neate 4 a 


DWNAVE WN OO ONOU EWN O OONOUE WN —“OOONOu se 


POPQPOPINIPIMINPININPINIPIPIPYNIPIPOPP PON nonofononofnonofpononononoponorornonopororororonrn 


OOO OOO 00 00 0 09 909 00 SI NN NS SSN NN IP PAA AAA AAA MMIII 


PAMAMAMAA NMA ES BEEPS EE PW 


OONOUWE Ww OO 


Mrmr 


ab 8 bd ad ed ad aod dadad edad Baba aadadtdabiababaabatadeatatadtaataiatatat datdatatadeietiaataiab pabatabadabdadadabadad 
COTO OCOCOCOCCOCCOCOCOCOCOOCOSCOCOCOCOC COO OC OOO OCOCOCOOOC OOOO OOCOOO OOO OOOOOOCOoOO 
attired tated dad ada Ia at Bada dada Dad daa edad ada adababababad 


VSSELSBFENVLS 
BAAAANRNN 


vv 
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16-Sep-1984 02:39:14 VAX-11 Bliss-32 V4.0-742 Pa 3 
a aees 1 0g: 79:16 DISKSVMSMASTER :(DEBUG.SRCIDBGSTO.B32:1> (1) 
> Wis: Tae Gee ae Ge » '!070-077 89::<2)>7 ; 

$6, ¢: 3; 3: ¢. 3: 3" 9. i10 “161 aABCDEFG 

ce ee a Se ae |e eee HI JKLMNO 

PR PN i ER EE HR ie ig =1¢ PQR ; T : VW 

ts le 1, 26, 18, 27, ) ie 4 =| 7 x Y 2 \ “ e 

Q. . Le e. g. LS e. # 1140-147 a cdefg 

fe fe fe fe fe fe fe fo i tRRrt2e tthe hee 

ee Oe ee ey ae ead ae 190-197 xyz!) delete 

) : VECTOR C,BYTE); 


! These two globals were copied over from DBGBLI.B832 after that module 
was eliminated. 


GLOBAL 
dbg$access_list : VECTOR (6) INITIAL (REP 6 OF (0)); ! access actuals needed for structure 
! references. The first element will 
! contain the no. of actuals 


GLOBAL 
dbg$gl_modrstptr2; ! Holds module rst posnter during TYPE command. 
! e.g., TYPE MOD1\10,20,30 


GLOBAL 
i Byte vectors are used to contain the 
: ‘mode’, ‘step type’, ‘search type’, 
! and output configuration data structures and 
also, the buffers used by RMS to return fully qualified filespecs 


dbgs b_def_mod: VECTOR Ceode Levels * mode_lvl_size, BYTE], ! DEFAULT MODE BLOCK 


DEF _STP : LOCKVECTO 
STEP_LEVELS, EVENTSK_STEPPING DESC_SIZEJ 
ELD” (EVENTSSTEPPING-DESC_FIECDS), 
dbg$gb_def_search: VECTOR Csearch_levels * search_lvl_size, BYTE) 
dbg$gb_def_define: VECTOR Cdefine_levels * define_lvil_size, BYTE], 
dbg$gb_def_out: VECTOR Coutput_size, BYTE), ! DEFAULT OUTPUT CONFIG 


~ 


T 
E 
T 
T 


‘ee 
Vee RRR ARH RHeRARHAHAAATHAAATHHEee eee eee eeteeeeteeeeeeeeeeeeeee 


: NOTE: 


! ALL initialization of addresses and filespec cir ings input to 

' RMS user control blocks (FABs, RABs, etc. ST be done dynamically 
' to maintain position independence. At compile time these addresses 

' are relative to 0, but are relocated at run time since the debugger 
! is brought in “behind” the user program. 
'eeeeeeeeteeeeakeeeeteeeeeeeeeeeteeteeereeeeetereeaneneeeeteeneaeeetene 
lee 

‘oe 


declare the FAB and RAB blocks for terminal 1/0. 


dbg$gl_inpfab: S$FAB (FAC=GET : 
- MRS=no_of_inp_chars 


: 


c_-_——. 
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DBGSTO 16-Sep-1984 02:39:14 VAX-11 Bliss-32 V4.0-742 Page 4 
v04-000 19-8 8=138e 96: 79:18 DISKSVMSMASTER = LDEBUG. SRC IDBGSTO.B32:1> (1) 
7 - . 
ig P dbg$gl_outpfab: SFAB (FAC=PUT 
74 P . yt ih) out width 
75 P » RAT=<CRS 
6 Pp SHR=<NIL> 
78 P dbg$gl_inprab: $RAB (USZ=no_of_inp_chars 
0 e ——" ROPS<PM] O~ 
e dbg$gl_outprab: $RAB (), - 
' Declare FAB and RAB blocks for LOG file 
P dbg$gl_logfab: SFAB (RFM=VAR 
P » FAC=PUT 
Pp » FOP=<MXV> 
P » MRS=tty_out_ width 
Pp . RAT=CR 
Pp SHR=NIL 
P 


dbg$gl_lograb: $RAB (ROP=<EOF > 
lee 
We'll give 20 trys for read error before take the exit. 


dbg$gl_readerr_cnt: INITIAL (0), 


'¢ 


+ 
his the only bitvector. 
dbg$gl_context: BITVECTOR Ccontext_bits), ! context LONGWORD 
} These are the global bytes. 


dbg$gb_set_module_flag: BYTE, 


PRIPOPIPIPIPIPIPOIIIRY <0 a st tt at a a tt 
MbPwnN— ONAWEWN—OOOnOu 


ooo 


OWE wWnr—OOen 


! TRUE during processing of SET MODULE. 
This changes the behavior of the 

lexers so that they allow module 

: names that begin with numbers. 

' TRUE if we are in an EXCEPTION BREAK 


AOE WN 0 OONO VEWN 2 OOO NOAUE WN OOO VOU EW" OVOONOu 


Ot ed ed et ed 
REPELS EE FAA AIA PIPIPIPIPININPINIDS 2 2 OOO OO MP OOOO 


CDOCOOCOOCOCOOCOCOSCOOCOCCOOCOCOCCO OOOO SOOCCOCOCO OOOO OCO OOOO OOOO OCOOCOOOOoOoOO 
nd 8 AAAI AAA AANA NIAAA AIAN ANIA NAIA 
ee ee ee ee ee ek ea ee ee ee ae a a ed a 


Be Be Be Be Be Oe Be Oe Be Be Se Se Oe Oe Se Se Se Se Se FH Fe SH Ge SH Se Se Be Se Se Ge Ge Se Se He Se Se Se Se Se Se Se Se Se Se SH Se Ge Se Se Se Se Ge Se Ge Se Se ae 


' 
' 
2 7 
2 ' 
' 
7 dbg$gb_ o-arg_flag: BYTE, ! TRUE if there is an argument to GO 
3 dbg$gb_language: BYTE, ' HOLDS LANGUAGE INDEX 
bg$gb_loc type: BYTE, ' TELLS WHAT SORT OF END RANGE LOCATION 
17 0 dbg$gb_resignal: BYTE, ' BOOLEAN, TRUE IF RESIGNALING ALL EXCEPTIONS 
18 51 dbg$gb_take_cmd: BYTE, ' BOOLEAN, TRUE IF ANOTHER COMMAND WILL BE READ 
19 33¢ dbg$gb-tbit~ok: BYTE i TBITS ARE LEGAL 
20 5 bg$gb_sym_status BYTE, ' contains status of sym lookups. 
21 54 dbg$gb_no_globals : BYTE ' replaces mc_global_locked flag. 
32 55 dbg$ab_keypad_ input Byte, i TRUE if we dre doing keypad input 
26 2$ dbg$gb_verb : BYTE, 
5 28 dbg$gb_radix:VECTOR(3,BYTE), ' Contains the radices grec itieg 
$$ 5 ' ina stl RADIXC/OVERR] command, 
60 ! or dbg$k_default if no radix 
28 1 ! override is in effect. 


DBGSTO 1b 
=000 1 
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p <74 Page 5 
p-19 DISKSVMSMASTER: (DEBUG. SRC JDBGST0.B32; 1 (1) 
s 


1 
Se 
Se 
his can be eeeeen by three constants: 
bg$b_radix_input 
bg$b 
bg 
or 
f 


@ over 2 
redponding to the three kinds 
ings (these are defined 

n DBGLIB). (This method of having 

a byte vector instead of three 
separate global bytes saves on 

Link time, and should be used 

more extensively in this module.) 


dbg$gb_unhandled_exc(0] is 
TROE att 


dbg$ab ynhend tod ex 
ECTORC10, BYTE) ' ter an unhandled exception. 
INITIAL(BYTEC(REP 10 OF (0))),! This is a vector because we push 


tthe value on a call. 
lee 
Global words. 


T 
d 
d 
d 
C 
1") 
i 


o 


dbg$gw_length, 

dbg$gw_locingth : INITIAL (0), 

gbgsgw_gbi ingth : INITIAL (0), 

dbg$gw_dfitleng : INITIAL (0), 

'e¢ 

' Now refs to byte vectors. Don't confuse these with byte 
! vectors. 


a place for the parser to store a 

Length given in a verb modifier ty 
Length given an override type spec 
length given in a default type spe 


Pete Se Se Ge Se Se Se Se Se Se Se Se Se Se Se Se Se Se Se Se Se Se Se 


OO O09 00 00 09 09 09 09 SIN INI NINN NNN NAA AAAAAO 
CNOA AE WN 9 OD NA UE WN OO ODNOU EW "OO OONOUE wv 


MAO ARAM FERRE EEE PWW 
OOOWNO NEW" O ODNOUES WN “OO OONOUE wr 


POPOPOPOROPENO PUP ToNoNo No Penono nono nononononofononononony 
DOOCOCCOOC CCC CCDC OOOCCOOOO COCO OCOOOOOOOCOOCOOOO 


HAA AA AAA AAA AANA AANA AANA NAA 


em a a ai a a et od od = = = = 


6 9 dbg$gb_verptr : REF VECTOR fF. BYTE), ' POINTER TO INPUT BUFFER FOR VERIFY 
61 9 dbasgb_mod_ptr : REF VECTOR BYTE), ! POINTER TO CURRENT MODE LEVEL 
o¢ 9 DBGS$GB_STP_PTR : REF EVENTSSTEPPING DESCRIPTOR, ! POINTER TO CURRENT STEP TYPE 
6 9 dbg$gb_search_ptr : REF VECTOR fF. BYTET, ' Pointer to search settings 
¢: , dbg$gb_define_ptr : REF VECTOR C, BYTE], ! Pointer to define settings 
266 99 ‘e+ 
267 00 ! REFs to more complicated (or more general) 
$08 0401 ! things than the above BYTE vectors. 

69 040 ! (The defn of the following cyees is why 
270 040 ! DBGRST.BEG is included in this module.) 

71 0404 m 

78 206 

7 dbg$gb_logfsr : REF VECTOR (C,BYTEI, ' Resultant LOG filespec 
74 0407 dbg$gb_logfse : REF VECTOR [,BYTEJ, ! Expanded LOG filespec 
? rts 4 dbg$gl"lognam : REF SNAM_DECL, ' LOG file NAM block 

9 410 ! Pointer to the current scope vector (CSP) 
278 gett DBGSGL_CSP_PTR : REF pth$pathname, 

80 018 DBGSGL_CISHEAD =: REF CISSLINK, ! Command input stream anchor 

4 Rete DBGSGL_CIS_LEVELS : INITIAL(O), ' Number of levels of CIS 

Hi Oé1¢ !ee 

84 041 ' Normal longword vectors. 

85 0418 leo 


Be Be Be ee Be Be Be Oe Be Oe Be Be Be Se Se Oe Se Se Se Se Ss Ge Se Be Se FH Se Ge BH Se oe Be Oe Se FH SH Se OH Os Oe we He Se OH Oe Oe Os Se Oe Ss Ge Se Oe Ss Oe oe 


AAAI PO PORIPINPINPUNPIPIRDD 2 3 OO OO Oe we 


Ses PEW OOO WO VF UN —OOONOUFEWN—O 


POPE EAA AI IA tt 


ee ee ee ee dd od od = od 


Be Be Be Be Oe Be Be Se Oe Oe Be Se Se Se Se Se F Se Se Se Se Se Se Se Se Se Se Se Se Be Se Se Se BH Se SH SH Ss Se Se Be Se Se Se Se Se Se Se Se Se Se Se Se Ge ee Se oe 
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16-Sep-1984 02:39:14 VAX-11 Bliss: =32 V4.0-742 6 
o=se0 1 382 95:75:85 DISKSVMSMASTER: (DEBUG. SRCIJDBGSTO. B32" r (1) 
dbg$reg_values VECTOR C17,LONG) ! Register values 
pence aner. LUM 
reg.vector : 
. INITIAL (REP "$ OF (0)), ' Vector of pointers to context regs 
gbasd' dimenist ; He by } gigens tone for FORTRAN array 
Pnrens S. © ‘ i contents of pecece _DIMENLST 
! during nested subscript 
! expressions. See the 
! routines DBGSPUSH NEST. STACK 
' and DBGSPOP_NEST STA 
‘ in the module 0B BCREDU C 
: for details on how this works. 
dbg$gl_nest_level, ae crit of nesting ¢ of 
' subscr express 
dbg$gl_list: VECTOR (3), ' LIST F COMMAND ARGUMENTS 
dbgsal partbptr: VECTOR (5), : + of parse tables 
dbg$gl"stk : semantic_stack, ! semartic stack for tokens, etc. 


lee 
A And finally the global scalar longwords. 


: INITIAL (4), 


imar | 


dbg$gl_ —— dst_ list ‘head : INITIAL(O), 
dbg$gi_ ype. ! 
dbg$gi_dfittyp : INITIAL (DSCSK DTYPE yt 
Stites sit’ : INITIAL ¥ 


: Twitiac (0), 
\tye : INITIAL (+1), 
ex, 


(Pela. input 
nd_tom_ 


dbg$gl bity 
Sbagsal g\.9 


tile, 


dbg$gi- Libs stop. addr 
dbg$gl-next_loc;, 
dbgsol “our tatyp : 
dbg$gi"set_source : 
dbg$gi- et “source2 : 
dbg$gl"reduc_rt, 
dbgsgl. step_fun, 
dbg$gl_ syene ead, 

dbg$gi"d islast : INITIAL(O), 


dbg$gl_search_verb, 


dbg$gi_transfer_address: INITIAL(O), 


i at 


} seed +f § Der INE 


Number of ascii characters to output 
i POINTER TO HEAD OF BREAKPOINT CHAIN 
Set on EX/override_radix 
i Pointer to the current primary 
re: of the moved DST List 
0 proce for the parser ny store a type. 
The yee specified in a SET TYPE statement. 
pe specified in verb aogteter 
obal Bat oe whether EDIT 
command is enabled. 


globat overriée type. 
: current Lexical lexeme routine 


i B 


ointer to input for HELP 

ointer to icf filespec 

ointer to current element of com arg List 
sed by oer in cey 


nt keyword table 
ISPLAYED 


! LIBSSTOP 

' NEXT PcATION TO DISPLAY y 

' type specified as a verb modifier. 
TRUE 


RING set source 


ction reut ines 


ane = socom 
POINTER” 10 “HERD F P SyRBb "Pape 
He F to last item in 
in List of dummy descriptors 
a. X, to head of command execution 
tree for SEARCH, 
Contains “transfer address” 


<o 
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D&GSTO 16-Sep-1984 02:39:14 VAX-11 Bliss-32 V4.0-742 Page 7 
v04-000 12=$08- 4382 95:79:05 DISKSVMSMASTER: (DEBUG. SACIDBGSTO.832;1" (1) 
43 pers 1 : as seen in TRANSFERSADDRESS 
rf: of ; : DST record. 
46 0479 1 ! Globals used for communication between the phases of the 
47 480 1 : - SOURCE command: 
48 481 1 dbg$gl_module : INITIAL(O), ! Contains the module rst pointer 
49 4 1 dbg$gl_dirlist, ' Contains a pointer to the 
50 04 1 ! directory List. 
51 0484 1 
2 ot Fs : dbg$gl_log_buf, ! pointer to buffer containing LOG f 
54 Be 1 ' Some globals used for communication between the phases of 
55 485 1 ! deposit_cmd: 
56 0489 1 
57 0490 1 dbg$floating_buffer : pacterh y-byted. 
426 0491 1 dbg$float_desc : pL OFe -BYTE), 
59 0492 #1 dbg$dbi_desc : BLOCK(8,BYTE), 
re 04935 1 dbg$dyn_str_desc, : “pha ae’ to descriptor for dynamic string 
1 0494 1 dbg$deposit_source : BLocetige BYT i: ! A standard descriptor for the source 
308 Reo : dbg$deposit_target : BLOCKL12, BYTE]; ! A standard descriptor for the target 
64 0497 1 ! Globals used for dst and gst management. 
365 0498 1 GLOBAL 
366 0499 1 Soatéet begin addr, ! virtual address where DST begins. 
367 0500 1 dbg$dst_end_addr, ' virtual address of last byte in DST. 
368 0501 1 dbg$dst_nexf_addr, ! virtual address where ‘next’ DST record begins. 
369 £44 1 dbgsgsr_begin_a dr, ' virtual address where GST begins. 
ery B2pz } dbg$GSR_next_addr : ref vector(,word]; ! virtual address of ‘next’ GS 
7 0505 1 GLOBAL dbg$runframe : VECTOREdbg$k_runfr_len/3 + 4,LONG) ! The current runframe 
37 0306 1 INITIAL CREP (dbgSk_runfr_len/3 + 4) OF (0)); 
374 0507 1 
375 0508 1 END 
376 0509 0 ELUDOM 
-TITLE DBGSTO 
-IDENT \v04-000\ 
-PSECT DBGSPLIT,NOWRT, SHR, PIC,0 
00 06 06 06 06 04 00 00 00 00 00 00 4 00 06 00000 P.*AA: .BYTE 6, 8. - 0.0.0.0. 0. 0. 4 6. 6. 6. 6.°;: 
'00 00 00 00 00 90 00 00 00 00 00 ? 00 00 0000F » Bs Be 6. 0, Q. 0, 0, 0, 0, 0, 8. . G3 
18 08 15 OA 1 0 1D 01 1¢ «1 4 00 90 OoiE - 9 F< vg 23 1,29 16, - ; 
OF 02 02 0¢ 0 Oe Oe ¢ Q 3 D 14 0¢ gp ; 16, 81, °11; zh, 18, 26, 13, 3, ¢- - 3 
01 01 OF 01 03 03 0 0 13 00 17 19 16 0003C ge 25 2 2 2, 14, 15, 22, 25. 28. = ; 
67 67 08 08 Og OB O8 ft 0 : rt te 3 oh : 00SR 1; 18. 18.5. ,5.,5.,8.,3- Fete feat, ‘ad 
o7 OF OF OF OF OF 0 ; 0? $7 07 07 03 07 07 09069 ? gb. is,‘27, 17, 1, 6. 6. 8. 6 6, 6. - ; 
00 00 00 00 00 07 07 07 00078 g. 7. 7. Dis te Ue Ue he Oe Ds a ts te 
o Py Ts - Ve Fe Fe 0, 0, 0, 0. 0 : 
-PSECT DBGSGLOBAL,NOEXE, PIC,2 
0000* 00000 DBGSGV_CONTROL:: 
-WORD <DBGS$GL_SUP_OR_TEST!256> : 
00002 -BLKB 2 


<o | 


2 
oo 1E-se0-198 02:39:14 vA 


00000000# 00004 DBGSACCESS_LIST:: 
LONG et 

0001C DBGSGL_MODRSTPTR2:: 
-BLKB 4 

00020 DBGSGB_DEF _MOD:: 
-BLKB 40 

00048 ete 2 a ‘ 

00060 DBGSGB_DEF _SEARCH:: 
.BCKB 
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00066 "BLKB 
| 00068 DBGSGB_DEF DEFINE :: 
-BCKB 
00068 "BLKB 
0006C DBG$GB_DEF _OUT:: 
-BCkB 3 
0006F “BLKB 
03 00070 DBGSGL_INPFAB: : 
.BYTE. 3 : 
50 00071 “BYTE 80 : 
0000 00072 "WORD 0 : 
00000000 00074 "LONG §60 : 
00000000 00078 "LONG 0 : 
00000000 0007¢ “LONG §6O ; 
00000000 00080 [LONG 0 : 
0000 00084 "WORD 0 : 
02 00086 "BYTE 2 : 
00 00087 "BYTE 0 : 
00000000 00088 "LONG 0 : 
00 0008C "BYTE 0 : 
00 00080 "BYTE 0 : 
00 QO0BE "BYTE 0 : 
02 0008F -BYTE 2 ; 
00000000 00090 [LONG 60 : 
0000000 00094 "LONG 60 : 
00000000 00098 "LONG 0 : 
00000000 0009¢ "LONG 60 : 
00000000 000 "LONG 60 : 
00 O00A4 “BYTE 0 ; 
0 O00AS "BYTE 0 : 
0084 000A “WORD =: 132 : 
00000000 000 "LONG OO : 
0000 O00AC WORD 0 : 
OOAE “BYTE 0 : 
AF “BYTE : 
00000000 90080 "LONG 60 : 
00000000 00084 "LONG 60 ; 
| 0000 00088 ‘WORD 0 2 
| 0 00088 “BYTE : : 
00000000 908 “LONG : 
0 C DBGSGL_OUTPE AB: 
00C1 BYTE 0 : 
00C2 "WORD : 
9000 0 00C4 “LONG : 
0000000 000¢8 LONG : 
! 
| 
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“pBGSTO 1529-1986 139: 
| v04-000 1ex0e- 1 3be 93:7 
01 OOTEB DBGSGL_LOGRAB:: 
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C DBGSGL sett CNT: 
00230 DBGSGL_CONTEXT: 
00234 DBG$GB_SET MODULE _FLAG: : 
00235 DBGSGB EXC BRE. FLAG:: 
00236 DBGSGB_GO_ARG FLAG: : 
00237 DBGSGB LANGUAGE : 
00238 DBGSGB_ Loc TYPE: 
00239 DBGSGB “RESTONAL: 
0023A DBGSGB_ TAKE, CMD: 
00238 DBGSGB_TB1T OK: 
| 0023¢ DBGSGB_SIR- STATUS: : 
| 0023D DBGSGB_NO_GLOBALS: : 
| 0023E DBGSGB “si, INPUT: 
| 0023F DBGSGB_ VERB: 
00240 DBGSGB_RADIX:: 
-BLKB. 
| 00243 “BLKB 
| 


saline ames ates ane ->-—r — os “o 
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1 
3 
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DBGSTO 1520-1986 02:3 VAK=11 
v04-000 eet) PRC EE eS Vt A 


00# 00244 DBGSGB_UNWANDLED, EXC: 
“BYTE OL103 


$0586 DBGSGW_ LENGTH: : 
LK 
00000000 00254 DBGS$Gw -LOCLNGTH: : 
00000000 00258 vBG$Gw -GBLLNGTH: ; 
00000000 0025C DBGSGW PPL TLENGS 
00260 DBGSGB_VERPTR: : 
00264 DBGSGB_MOD pIR:: 
00268 DBG$G8_sTP pIR:: 
0026C DBG$GB ~SEARCH PTR:: 
00270 DBG$GB -DERINE _PTR:: 


“2 R OOOO n NG 


sa. 


4 
00274 DBG$GB LAGER: . 
00278 DBG$GB LOGE SE: : 
0027C DBGSGL _LOGNAM: : 
-BLKB 4 
00280 DBGSGL_CSP_PTR:: 
‘BCKB 4 
00284 DBGSGL_CiSHEAD: : 
00000000 00288 DBGSGL_CiS LEVELS: 
000000004 0028C DBGSREG_VALUES: : 
.LONG C17) 
00000000# 00200 DBGSREG_VECTOR: : ‘ot17) 


-LON 
00314 DBGSGL -DIRENLST: : 
0033C DBGSGL Nest. STACK: : 
-BLKB 100 
QO3A0 DBGS$GL NEST LEVEL : 
QO3A4 DBGSGL_LIST:: 
-BLKB 12 
00380 DBGSGL Pa ee 5g 
003C4 DBGSGL_STK:: 
-BLKB 480 
00000004 005A4 DBGSGL ~ASCH LEN: : } 
00SA8 DBGSGL ees 
QOSAC DBGSGL ci RADIX: : 
00580 DBGSGL_CURRENT_PRIMARY: : 
-BLKB 4 
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DBGSTO 
v04-000 


00000000 


00000008 
FFFFFFFF 
00000000 
FFFFFFFF 


00000000 
00000000 


00000000 


00000000 
00000000 


00000000 


00000000 
00000000 


IESSeHate AFIS 
LONG 0 
00588 DBGSGL ~TiPE:: 
00SBC DBGSGLDFL TT YP: : 
005¢0 DBGSGL_LOCTYP: 
0054 DBGSGL EBLE wnat: 
00SCB DBGSGL_GBLTYB: 
00SCC DBGSGL_GéT LEX: : . 
00500 DBGSGL_NELP INPUT: : 
005D4 DBGSGL_IND_COM_FILE:: 
-BCKB ~ 4 
00508 DBGSGL_Lis PIR: 
00SDC DBGSGL_KEY ns 
00SE0 DBGSGL_KEYBOARD_1D: 
00SE4 DBGSGL_ new Tau; i 
00SE8 DBGSGL_LAST LOC:: 
OOSEC DBGSGL_LAST VAL:: 


BL 
005FO DBGSGL.LIB SIGNAL ADDR: 


005F4 pacsci tis ae ee 
005F8 DBGSGL NEXT LOC: 3 
OOSFC DBGS$GL -OWRIDTYP: 
00600 DBGSGL SET SOURCE: : 
00604 DBGSGL_SET SOURCE2: : 
. LONG 
00608 DOSSEL _REPUC AT: 5 
0060C DBGSGL_STEP NUM: : 
00610 DBGSGL_SYMHEAD: : 
-BLKB 
00614 DBGSGL_DLISLAST:: 
00618 DBGSGL_SEARCH_VERB:: 
BLKB™ 4 


0061C DBGSGL_TRANSFER_ADORESS: : 


ON 
00620 DBGS$GL ec 
00624 DBGS$GL_DIRLIST: 
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(1) 
-BLKB 

00628 DBGSGL_LOG ofr 

0062C DBGSFLOATING BUFFER: : 
-BLKB 


064A -BLKB 
064C DBGSFLOAT ke 8 


00654 DBGSDBL DESC: ; 
0065C DBGSDYN =STRPDESC:: 
00660 DBGSDEPOSIT, SOUR 
0066C DBGSDEPOSIT TARGE 
00678 DBG$DST -BEGIN ADD 
0067¢ DBGSDST_END ADDR: 
00680 DBGSDST_NEXT ADDR: : 
00684 DBGS$GSR BEGIN ADDR: 
00688 DBGS$GSR NEXT pe 
00000000# 0068C DBGSRUNFRAME : 


: : 
: 


> 


.LONG 037] 3 
DBGSCHAR_TABLE== _—P.AAA 
-WEAK DBGSGL_SUP_OR_TEST 
PSECT SUMMARY 
Name Bytes Attributes 
DBGS$GLOBAL 1824 NOVEC, WRT, RD ,NOEXE,NOSHR, LCL, REL, CON, PIC,ALIGN(2) 
DBGSPLIT 128 NOVEC,NOWRT, RD, EXE, SHR, LCL, REL, CON, PIC,ALIGN(O) 
Library Statistics 
socccese Gyabel§ eocoo--e Pages Processing 
File Total Loaded Percent Mapped Time 
“$23 28DUA 8: SYSLIBILI8.L32;1 18619 30 0 1009 00:01.9 
"$255$DUA28 : (DEBUG. OBJ JS TRUCDEF 432; 1 3 0 9 0:00.1 
=B2SSBDUAZE: : EDEBUG.OB) IDBGL 18.1 3 31 154 41 97 0:01.9 
$255 : (DEBUG.OBJ JOSTRECRDS.L32;1 ave 0 ‘ 9 
STi HEY BOGRSE «13: | 386 1 6 22 0000-3 
*$255$DUA28 : (DEBUG. OBJ JDBGGEN.L32;1 150 30 2 00:00. 


Se Se Se Se Se Se Se Se Se Se Se Se Se Se Se Se Se Se See Se Se ee Se Se Se Se ee se SH Se eee Beas 


| ——— _ —_ _——— —" ; : . 
eGSta, ibestoctone 0g:59:]4 yA 
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Line 
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COMMAND QUALIFIERS 
BLISS/CHECK=(FIELD,INITIAL,OPTIMIZE)/LIS=L1S$:DBGSTO/OBJ=0BJ$:DBGSTO MSRC$:DBGSTO/UPDATE=(ENH$:DBGSTO) 
0 code + 1952 data bytes 


un Time: 0:15. 

sed Time: 00:18.0 

s/CPU Min: 036 
Lexemes/CPU-Min: 27492 


ry Used: 113 pages 
enptletien. cenalotee 


IPMENT CORPORATION 
L.AND PROPRIETARY 
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